Imports System.Collections.Generic

Namespace BAL.Servicio
    Public Class Asistencia
        Public Function Grabar(ByVal _Asistencias As List(Of BEL.Servicio.Asistencia)) As Boolean
            Dim _dal As New DAL.Servicio.Asistencia
            Return _dal.Insertar(_Asistencias)
        End Function
        Public Function Imprimir(ByVal _Parametros As Object()) As DataTable
            Dim _dal As New DAL.Servicio.Asistencia
            Return _dal.Imprimir(_Parametros)
        End Function
        Public Function ListarReservas(ByVal _Parametros As Object()) As DataTable
            Dim _dal As New DAL.Servicio.Asistencia
            Return _dal.ListarReservas(_Parametros)
        End Function
        Public Function ListarReservasActivas(ByVal _Parametros As Object()) As DataTable
            Dim _dal As New DAL.Servicio.Asistencia
            Return _dal.ListarReservasActivas(_Parametros)
        End Function
    End Class
End Namespace